INSTRUMENT PINGA;    
P8 ← 1+2400/P3; PRINT P8;
EXPEN[10](P4,15*MAG/P8,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT PINGB;    
P8 ← 1+2400/P3; PRINT P8;
EXPEN[10](P4,15*MAG/P8,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT PINGC;    
P8 ← 1+2400/P3; PRINT P8;
EXPEN[10](P4,15*MAG/P8,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT PINGD;    
P8 ← 1+2400/P3; PRINT P8;
EXPEN[10](P4,15*MAG/P8,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT PINGE;    
P8 ← 1+2400/P3; PRINT P8;
EXPEN[10](P4,15*MAG/P8,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT PINGF;    
P8 ← 1+2400/P3; PRINT P8;
EXPEN[10](P4,15*MAG/P8,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT PINGG;    
P8 ← 1+2400/P3; PRINT P8;
EXPEN[10](P4,15*MAG/P8,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT PINGH;    
P8 ← 1+2400/P3; PRINT P8;
EXPEN[10](P4,15*MAG/P8,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT PINGI;    
P8 ← 1+2400/P3; PRINT P8;
EXPEN[10](P4,15*MAG/P8,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT PINGJ;    
P8 ← 1+2400/P3; PRINT P8;
EXPEN[10](P4,15*MAG/P8,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT PINGK;    
P8 ← 1+2400/P3; PRINT P8;
EXPEN[10](P4,15*MAG/P8,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT PINGL;    
P8 ← 1+2400/P3; PRINT P8;
EXPEN[10](P4,15*MAG/P8,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT PINGM;    
P8 ← 1+2400/P3; PRINT P8;
EXPEN[10](P4,15*MAG/P8,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT PINGN;    
P8 ← 1+2400/P3; PRINT P8;
EXPEN[10](P4,15*MAG/P8,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT PINGO;    
P8 ← 1+2400/P3; PRINT P8;
EXPEN[10](P4,15*MAG/P8,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT PINGP;    
P8 ← 1+2400/P3; PRINT P8;
EXPEN[10](P4,15*MAG/P8,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT PINGQ;    
P8 ← 1+2400/P3; PRINT P8;
EXPEN[10](P4,15*MAG/P8,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT PINGR;    
P8 ← 1+2400/P3; PRINT P8;
EXPEN[10](P4,15*MAG/P8,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT PINGS;    
P8 ← 1+2400/P3; PRINT P8;
EXPEN[10](P4,15*MAG/P8,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT PINGT;    
P8 ← 1+2400/P3; PRINT P8;
EXPEN[10](P4,15*MAG/P8,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT PINGU;    
P8 ← 1+2400/P3; PRINT P8;
EXPEN[10](P4,15*MAG/P8,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT PINGV;    
P8 ← 1+2400/P3; PRINT P8;
EXPEN[10](P4,15*MAG/P8,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT PINGW;    
P8 ← 1+2400/P3; PRINT P8;
EXPEN[10](P4,15*MAG/P8,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT PINGX;    
P8 ← 1+2400/P3; PRINT P8;
EXPEN[10](P4,15*MAG/P8,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT PINGY;    
P8 ← 1+2400/P3; PRINT P8;
EXPEN[10](P4,15*MAG/P8,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT PINGZ;    
P8 ← 1+2400/P3; PRINT P8;
EXPEN[10](P4,15*MAG/P8,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;